From: Eli Zaretskii <eliz@is.elta.co.il>
Date: Sat, 21 Feb 2004 13:48:44 +0000 (+0000)
Subject: (texinfo-insert-@item): Look for the current
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~23967
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=53109c94ce3940dc7bae537a91358877609596f3;p=emacs.git

(texinfo-insert-@item): Look for the current
Texinfo environment, using the same method as in texinfo-insert-@end,
and insert a space rather than a newline if point in a `table' environment.
---

diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index 3c5559897b4..8e5b94114a3 100644
--- a/lisp/textmodes/texinfo.el
+++ b/lisp/textmodes/texinfo.el
@@ -803,10 +803,18 @@ The default is not to surround any existing words with the braces."
   (texinfo-insert-@-with-arg "file" arg))
 
 (defun texinfo-insert-@item ()
-  "Insert the string `@item' in a Texinfo buffer."
+  "Insert the string `@item' in a Texinfo buffer.
+If in a table defined by @table, follow said string with a space.
+Otherwise, follow with a newline."
   (interactive)
-  (insert "@item")
-  (newline))
+  (insert "@item"
+	  (if (equal (ignore-errors
+		      (save-excursion
+			(texinfo-last-unended-begin)
+			(match-string 1)))
+		     "table")
+	      ? ;space
+	    ?\n)))
 
 (defun texinfo-insert-@kbd (&optional arg)
   "Insert a `@kbd{...}' command in a Texinfo buffer.